(other-frame): Subtract 1 from hpos for new mouse position.

diff --git a/lisp/frame.el b/lisp/frame.el
index f40516d4308c54affbc4af33fb1324d4ad52e9e1..6ba3c863f9977f79aa8072253f3e77ddd4b5cca8 100644 (file)
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -376,7 +376,7 @@ A negative ARG moves in the opposite order."
       (setq arg (1+ arg)))
     (raise-frame frame)
     (select-frame frame)
-    (set-mouse-position (selected-frame) (frame-width) 0)
+    (set-mouse-position (selected-frame) (1- (frame-width)) 0)
     (unfocus-frame)))
 \f
 ;;;; Frame configurations